home *** CD-ROM | disk | FTP | other *** search
/ Data Base of the Video Yearbook 1995 / Data Base of the Video Yearbook 1995 - Disc 1.iso / cosmos / shared.dir / 00961.ls < prev    next >
Encoding:
Text File  |  1995-12-19  |  267 b   |  11 lines

  1. on makenai
  2.   global numb, mydatebase
  3.   set nai to "NAIYOU" & spacedelete(item 8 of line numb of mydatebase)
  4.   set nai1 to readtextfile(pathName() & nai)
  5.   if nai1 <> 0 then
  6.   else
  7.     beep()
  8.   end if
  9.   return item value(item 3 of line numb of mydatebase) of nai1
  10. end
  11.